home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / misc.swg / 0055_BREAK and CONTINUE.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-11-02  |  252 b   |  12 lines

  1. {
  2. MARTIN LARSEN
  3.  
  4. There are at least two nice features in BP7: BREAK and CONTINUE:
  5. }
  6.  
  7. Repeat
  8.   Inc(Count);
  9.   if Odd(Count) then Continue; { Go to start of loop }
  10.   if Count = 10 then Break;    { Go to sentence just after loop }
  11. Until False;
  12.